function [discount,beca,stipend] = u22_2011(math,lang,demrecode)
%% Universidad de Tarapaca
lm=(math+lang)/2;
beca=zeros(size(lm,1),1);
stipend=zeros(size(lm,1),1);

%Beca Excelencia Acad'emica UTA
discount=0.5*(lm>=650)+0.5*(lm>=675);

%BVP
if demrecode==2291 || demrecode==2231 || demrecode==2225 || demrecode==2293 || demrecode==2262 || demrecode==2265 || demrecode==2261 || demrecode==2259 || demrecode==2290 || demrecode==2222
    [auxdiscount,stipend]=bvp(lm);
    discount=max(discount,auxdiscount);
end

end
